-- background: 15914 from stack: in.0
-- bmap block id: 15788
-- flags: 0000
-- background id: 0
-- name: Init
----- HyperTalk script -----
on poly
  put 0 into sx
  put 0 into sy
  put 0 into sx2
  put 0 into sx3
  put 0 into sx4
  put 0 into sxy
  put 0 into sx2y
  put number of lines in field 1 into n
  repeat with i=1 to n
    put (line i of field 1)/1000 into x
    put line i of field 2 into y
    add x to sx
    add y to sy
    add x*x to sx2
    add x*x*x to sx3
    add x*x*x*x to sx4
    add x*y to sxy
    add x*x*y to sx2y
  end repeat
  set numberFormat to "0.0000000"
  put n*sx2*sx4+(sx*sx3*sx2)*2-sx2*sx2*sx2-sx3*sx3*n-sx*sx*sx4 into det
  put (sy*sx2*sx4+sx*sx3*sx2y+sxy*sx3*sx2-sx2y*sx2*sx2-sx3*sx3*sy- sxy*sx*sx4)/det into line 1 of field 3
  put (n*sxy*sx4+sy*sx3*sx2+sx*sx2y*sx2-sxy*sx2*sx2-sx2y*sx3*n- sy*sx*sx4)/det into line 2 of field 3
  put (n*sx2*sx2y+sx*sx2*sxy+sy*sx3*sx-sy*sx2*sx2-sx3*sxy*n- sx2y*sx*sx)/det into line 3 of field 3
end poly


-- part 1 (field)
-- low flags: 00
-- high flags: 4000
-- rect: left=24 top=54 right=305 bottom=67
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 15026
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 


-- part 3 (field)
-- low flags: 00
-- high flags: 4000
-- rect: left=86 top=54 right=305 bottom=126
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 15026
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 


-- part 5 (field)
-- low flags: 00
-- high flags: 4000
-- rect: left=321 top=225 right=277 bottom=434
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 15026
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 


-- part 6 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=410 top=96 right=138 bottom=457
-- title width / last selected line: 0
-- icon id / first selected line: 14767 / 14767
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 
----- HyperTalk script -----
on mouseUp
  show field "Help"
end mouseUp



-- part 7 (field)
-- low flags: 01
-- high flags: 0001
-- rect: left=153 top=92 right=300 bottom=490
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 15026
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Help
----- HyperTalk script -----
on mouseUp
  hide field Help
end mouseUp


-- part 8 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=31 top=298 right=320 bottom=131
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Initialize
----- HyperTalk script -----
on mouseUp
  poly
end mouseUp